home *** CD-ROM | disk | FTP | other *** search
/ SPACE 1 / SPACE - Library 1 - Volume 1.iso / misc~1 / 664 / bonus1.bas (.txt) next >
Atari STOS Basic  |  1993-07-04  |  15KB  |  51 lines
  1. 1 VARNAME
  2. 10 CLS
  3. 1000 FADE
  4. 1001 WAIT VBL
  5. 1002 FOR
  6. 1005 GOSUB
  7. 1010 FADE
  8. 11 GOSUB
  9. 12 PEN
  10. 120 IF
  11. 13 REPEAT
  12. 14 UNTIL
  13. 140 GOSUB
  14. 150 GOTO
  15. 160 IF
  16. 170 IF
  17. 180 IF
  18. 190 IF
  19. 191 IF
  20. 20 VARNAME
  21. 200 IF
  22. 210 IF
  23. 220 IF
  24. 230 IF
  25. 24 INK
  26. 240 RETURN
  27. 25 SPRITE
  28. 250 IF
  29. 26 VARNAME
  30. 260 IF
  31. 270 RETURN
  32. 280 IF
  33. 290 IF
  34. 30 SPRITE
  35. 300 RETURN
  36. 310 IF
  37. 320 IF
  38. 330 RETURN
  39. 340 IF
  40. 350 IF
  41. 360 RETURN
  42. 370 ANIM
  43. 400 VARNAME
  44. 500 VARNAME
  45. 5000 PEN
  46. 501 FOR
  47. 5010 LOCATE
  48. 502 RETURN
  49. 5020 LOCATE
  50. 5030 RETURN
  51.